object frmView: TfrmView Left = 144 Top = 267 ActiveControl = butNext BorderIcons = [biSystemMenu] BorderStyle = bsDialog Caption = 'View Wizard' ClientHeight = 368 ClientWidth = 577 Font.Color = clWindowText Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] Position = poScreenCenter OnCreate = FormCreate PixelsPerInch = 120 TextHeight = 16 object bevelLine: TBevel Left = 8 Top = 320 Width = 561 Height = 9 Shape = bsBottomLine end object panelImage: TPanel Left = 16 Top = 16 Width = 169 Height = 297 BevelOuter = bvNone BorderStyle = bsSingle TabOrder = 0 object ImageView: TImage Left = 0 Top = 0 Width = 165 Height = 293 Align = alClient Center = True Picture.Data = {} end end object butBack: TButton Left = 159 Top = 336 Width = 97 Height = 26 Caption = '< &Back' Enabled = False TabOrder = 1 OnClick = ButtonClick end object butNext: TButton Left = 256 Top = 336 Width = 97 Height = 26 Caption = '&Next >' Default = True TabOrder = 2 OnClick = ButtonClick end object butFinish: TButton Left = 353 Top = 336 Width = 97 Height = 26 Caption = '&Finish' Default = True Enabled = False TabOrder = 3 OnClick = ButtonClick end object butCancel: TButton Left = 464 Top = 336 Width = 97 Height = 26 Cancel = True Caption = '&Cancel' TabOrder = 4 OnClick = ButtonClick end object Panel1: TPanel Left = 200 Top = 16 Width = 353 Height = 297 BevelOuter = bvNone TabOrder = 5 object Label3: TLabel Left = 7 Top = 23 Width = 337 Height = 66 AutoSize = False Caption = 'Welcome to the View Wizard. This wizard will step you through th' + 'e process of setting up a point of view to look at the bodies in' + ' your system.' end object Label11: TLabel Left = 7 Top = 95 Width = 337 Height = 66 AutoSize = False Caption = 'Use the '#39'&Next'#39' button to go to the next screen and the '#39'&Back'#39' ' + 'button to return to the previous screen.' end object Label1: TLabel Left = 8 Top = 157 Width = 337 Height = 92 AutoSize = False Caption = 'At anytime, you may use the '#39'&Cancel'#39' button to cancel the wizar' + 'd and return to the previous view setting. When the View Wizard ' + 'has enough information to set up the point of view, you may chos' + 'e the '#39'&Finish'#39' button.' end object Label2: TLabel Left = 7 Top = 252 Width = 337 Height = 37 AutoSize = False Caption = 'To proceed, click the '#39'&Next'#39' button.' end end object Panel2: TPanel Left = 200 Top = 16 Width = 353 Height = 297 BevelOuter = bvNone TabOrder = 6 object Label4: TLabel Left = 8 Top = 21 Width = 337 Height = 84 AutoSize = False Caption = 'Solar System works in three space, therefore when setting up the' + ' point of view, you must think in 3D. To begin with, please sele' + 'ct the type of view you would like to create.' end object RadioButton1: TRadioButton Left = 20 Top = 97 Width = 313 Height = 50 Caption = 'I wish to look away from a point in space.' Checked = True TabOrder = 0 TabStop = True end object RadioButton2: TRadioButton Left = 20 Top = 140 Width = 313 Height = 50 Caption = 'I wish to look away from a body in space.' TabOrder = 1 OnClick = RadioButton2Click end object RadioButton3: TRadioButton Left = 20 Top = 182 Width = 313 Height = 50 Caption = 'I wish to look towards a point in space.' TabOrder = 2 end object RadioButton4: TRadioButton Left = 20 Top = 225 Width = 313 Height = 50 Caption = 'I wish to look towards a body in space.' TabOrder = 3 end end object Panel3: TPanel Left = 200 Top = 16 Width = 353 Height = 297 BevelOuter = bvNone TabOrder = 7 object LblBodyAway: TLabel Left = 8 Top = 29 Width = 337 Height = 61 AutoSize = False Caption = 'You have chosen to look away from one of the bodies in your syst' + 'em. Please select the body that you would like to look away from' + '.' end object lblBodyTowards: TLabel Left = 8 Top = 29 Width = 337 Height = 84 AutoSize = False Caption = 'You have chosen to look towards one of the bodies in your system' + '. Please select the body that you would like to look towards.' end object ListBoxChoseBody: TListBox Left = 42 Top = 115 Width = 268 Height = 160 ItemHeight = 16 Sorted = True TabOrder = 0 OnClick = ListBoxChoseBodyClick end end object Panel6: TPanel Left = 200 Top = 16 Width = 353 Height = 297 BevelOuter = bvNone TabOrder = 8 object Label6: TLabel Left = 8 Top = 32 Width = 337 Height = 65 AutoSize = False Caption = 'That is all the information the the wizard needs. Please click '#39 + '&Finish'#39' to implement your selection.' end object lblNote1: TLabel Left = 81 Top = 112 Width = 255 Height = 100 AutoSize = False Caption = 'The scrollbars on the side of the viewport can be used to change' + ' the angle of view.' end object Label8: TLabel Left = 17 Top = 112 Width = 56 Height = 33 AutoSize = False Caption = 'Note:' end object lblNote2: TLabel Left = 81 Top = 112 Width = 255 Height = 153 AutoSize = False Caption = 'With this setup, the scrollbars on the side of the viewport can ' + 'not be used to adjust your point of view, since the computer is ' + 'doing it for you. The position of the scrollbars still reprisent' + ' the direction of your point of view.' Visible = False end end object Panel4: TPanel Left = 200 Top = 16 Width = 353 Height = 297 BevelOuter = bvNone TabOrder = 9 object lblPointAway: TLabel Left = 8 Top = 25 Width = 337 Height = 56 AutoSize = False Caption = 'You have chosen to look away from a point in space. Please input' + ' the point that you would like to look away from.' end object lblPointTowards: TLabel Left = 8 Top = 25 Width = 337 Height = 72 AutoSize = False Caption = 'You have chosen to look towards a point in space. Please input t' + 'he point that you would like to look towards.' end object PanelCartesian: TPanel Left = 1 Top = 100 Width = 350 Height = 157 BevelOuter = bvNone TabOrder = 0 object lblxpos: TLabel Left = 13 Top = 16 Width = 84 Height = 33 AutoSize = False Caption = '&X Position:' FocusControl = Editxposition end object lblypos: TLabel Left = 13 Top = 66 Width = 84 Height = 31 AutoSize = False Caption = '&Y Position:' FocusControl = Edityposition end object lblzpos: TLabel Left = 13 Top = 119 Width = 84 Height = 34 AutoSize = False Caption = '&Z Position:' FocusControl = EditZPosition end object lblxPosUnit: TLabel Left = 277 Top = 17 Width = 76 Height = 32 AutoSize = False Caption = 'meter' end object lblYPosUnit: TLabel Left = 277 Top = 66 Width = 76 Height = 31 AutoSize = False Caption = 'meter' end object lblZPosUnit: TLabel Left = 277 Top = 119 Width = 76 Height = 34 AutoSize = False Caption = 'meter' end object Editxposition: TEdit Left = 99 Top = 12 Width = 170 Height = 24 TabOrder = 0 Text = '0' end object Edityposition: TEdit Left = 99 Top = 62 Width = 170 Height = 24 TabOrder = 1 Text = '0' end object EditZPosition: TEdit Left = 99 Top = 115 Width = 170 Height = 24 TabOrder = 2 Text = '0' end end end object Panel5: TPanel Left = 200 Top = 16 Width = 353 Height = 297 BevelOuter = bvNone TabOrder = 10 object lbltowardsPoint: TLabel Left = 8 Top = 10 Width = 337 Height = 50 AutoSize = False Caption = 'You have chosen to look towards a point in space. Please input t' + 'he distance away from the point that you would like the eye posi' + 'tioned.' end object ldlDistance: TLabel Left = 16 Top = 92 Width = 89 Height = 37 AutoSize = False Caption = '&Distance:' FocusControl = EditDistance end object lblTowardsBody: TLabel Left = 8 Top = 10 Width = 337 Height = 71 AutoSize = False Caption = 'You have chosen to look towards a body in space. Please input th' + 'e distance away from the object that you would like the eye posi' + 'tioned.' Visible = False end object lbldistancebody1: TLabel Left = 8 Top = 145 Width = 337 Height = 53 AutoSize = False Caption = 'To understand what distance represents, imagin a sphere of radiu' + 's equal to distance. At the center of the sphere is the body tha' + 't you are looking towards.' end object lbldistancebody2: TLabel Left = 8 Top = 200 Width = 337 Height = 87 AutoSize = False Caption = 'Your eye is located on this sphere so that when you move the scr' + 'ollbars, your eye moves around the sphere. This way your eye is ' + 'always the same distance from the body and you can look at the b' + 'ody from many different positions.' end object lbldistancepoint1: TLabel Left = 8 Top = 145 Width = 337 Height = 64 AutoSize = False Caption = 'To understand what distance represents, imagin a sphere of radiu' + 's equal to distance. At the center of the sphere is the point in' + ' space that you are looking towards.' end object lbldistancePoint2: TLabel Left = 8 Top = 200 Width = 337 Height = 97 AutoSize = False Caption = 'Your eye is located on this sphere so that when you move the scr' + 'ollbars, your eye moves around the sphere. This way your eye is ' + 'always the same distance from the point in space and you can loo' + 'k towards this point from many different positions.' end object lblDistanceUnit: TLabel Left = 277 Top = 92 Width = 76 Height = 37 AutoSize = False Caption = 'meter' end object EditDistance: TEdit Left = 102 Top = 88 Width = 170 Height = 24 TabOrder = 0 Text = '1' end end object Panel7: TPanel Left = 200 Top = 16 Width = 353 Height = 297 BevelOuter = bvNone TabOrder = 11 Visible = False object lblawayPoint: TLabel Left = 8 Top = 22 Width = 337 Height = 43 AutoSize = False Caption = 'You have chosen to look away from a point in space. Would you li' + 'ke to:' end object lblawaybody: TLabel Left = 8 Top = 22 Width = 337 Height = 59 AutoSize = False Caption = 'You have chosen to look away from a body in space. Would you lik' + 'e to:' end object Label9: TLabel Left = 150 Top = 117 Width = 35 Height = 28 Caption = 'Or' end object lblRadioPoint: TLabel Left = 29 Top = 166 Width = 322 Height = 100 AutoSize = False Caption = 'that you are always looking towards a particular body. This way,' + ' whenever the body moves, your direction of view is automaticall' + 'y updated.' end object lblRadioBody: TLabel Left = 29 Top = 166 Width = 322 Height = 99 AutoSize = False Caption = 'that you are always looking towards a particular body. This way,' + ' whenever the body you are looking at or the one that your point' + ' of view is attached to moves, your direction of view is automat' + 'ically updated.' end object RadioButton5: TRadioButton Left = 9 Top = 88 Width = 344 Height = 25 Caption = 'Use the scrollbars to change your direction of view.' Checked = True TabOrder = 0 TabStop = True end object RadioButton6: TRadioButton Left = 10 Top = 144 Width = 334 Height = 23 Caption = 'Allow the computer to adjust your direction of view, so' TabOrder = 1 end end object Panel8: TPanel Left = 200 Top = 16 Width = 353 Height = 297 BevelOuter = bvNone Caption = 'Panel8' TabOrder = 12 Visible = False object lbl2body: TLabel Left = 8 Top = 26 Width = 337 Height = 61 AutoSize = False Caption = 'You have chosen to look away from one body and towards another b' + 'ody in your system. Please select the body that you would like t' + 'o look towards.' end object lblpointBody: TLabel Left = 8 Top = 26 Width = 337 Height = 79 AutoSize = False Caption = 'You have chosen to look away from a point in space and towards o' + 'ne of the bodies in your system. Please select the body that you' + ' would like to look towards.' end object ListBoxTowardsbody: TListBox Left = 42 Top = 106 Width = 268 Height = 160 ItemHeight = 16 Sorted = True TabOrder = 0 OnClick = ListBoxTowardsbodyClick end end object ImageList: TImageList BkColor = clSilver AllocBy = 1 Height = 230 Width = 120 Left = 75 Top = 328 end end